#!/usr/local/bin/perl require "cgi-lib"; &ReadParse; print "Content-type:text/html\n\n"; print qq{}; print qq{

}; foreach $i (keys(%in)) { print "$i = $in{$i}
\n"; } print "";